APPENDIX B 



EXAMPLE ROM SCRIPTS FOR RISC 
PROCESSOR CORE OF IPCM 



9,13 Example Scripts (ROM contents) 



9.13.1 Vectors 



The first 32 addresses are jumps to routines (reset at address 0, illegal instruction at 
address 1, etc.) 



// 1 - illegal instruction trap 
// 2 - copy from MCore to DSP 
// 3 - copy from DSP to MOore 



0 


8051 


// start: 


jrrp 


GetChOPC 


1 


8001 


// 1: 


jnp 


lb 


2 


80fc 


// 


jrrp 


MDdma 


3 


8150 


// 


jnrp 


EMdma 


4 


0088 


// 


NOP 


(mov r0,r0) 


5 


0088 


// 


NOP 




6 


0088 


// 


NOP 




7 


0088 


// 


NOP 




8 


0088 


// 


NOP 




9 


0088 


// 


NOP 




10 


0088 


// 


NOP 




11 


0088 


// 


NOP 




12 


0088 


// 


NOP 




13 


0088 


// 


NOP 




14 


0088 


// 


NOP 




15 


0088 


// 


NOP 




16 


0088 


// 


NOP 




17 


0088 


// 


NOP 




18 


0088 


// 


NOP 




19 


0088 


// 


NOP 





o 



o 





0088 


/ / 


NOP 




0088 




NOP 


22 


0088 


// 


NOP 


23 


0088 


// 


NOP 


24 


0088 


II 


NOP 


25 


0088 


II 


NOP 


26 


0088 


// 


NOP 


27 


0088 


II 


NOP 


28 


0088 


II 


NOP 


29 


0088 


II 


NOP 


30 


0088 


II 


NOP 


31 


0088 


II 


NOP 



9.13.2 Context Switch 

The following code is the context switch routine in ROM; notice that almost all the 
instructions here cannot work anywhere else; the execution order is the only possible one. 



32 


00e3 


// 


33 


01e3 


// 


34 


OOeO 


// 


35 


OleO 


// 


36 


02e0 


// 


37 


03e0 


// 


38 


04e0 


// 


39 


05e0 


// 


40 


02e3 


// 


41 


03e3 


// 


42 


07e0 


// 


43 


OOeO 


// 


44 


OleO 


// 


45 


02e0 


// 


46 


03e0 


// 


47 


04e0 


// 


48 


05e0 


// 


49 


06e0 


// 


50 


01e2 


// 


51 


00e3 


// 


.52 


01e3 


// 


53 


01e4 


// 


54 


00e3 


// 


55 


01e3 


// 


56 


1811 


// 


57 


04e3 


// 


58 


05e3 


// 


59 


07el 


// 


60 


06el 


// 


61 


05el 


// 


62 


04el 


// 


63 


03el 


// 


64 


02el 


// 


65 


Olel 


// 



// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 



EM [0x7002] --> rO 
address to spill registers 



saved) 
saved) 
saved) 
saved) 
saved) 
saved) 
s.) & 



(GReg[l] 
(GReg[2] 
(GReg[3] 
(GReg [4] 
(GReg[5] 
(GReg [6] 
(GReg [7] 
(ShPC saved) & 
(ShLoop saved) 
(MA saved) 
(MD saved) 
(MS saved) 
(DA saved) 
(DD saved) 
(DS saved) 
(CS saved) 



(MA 
(MD 
(MS 
(DA 
(DD 
(DS 
(ShPC - 
(ShLoop 
Sc (CS - 



& 



GReg[l] ) 
GReg [2]) 
GReg [3] ) 
--> GReg [4] ) 
--> GReg[5]) 
--> GReg[6] ) 
-> GReg[7] ) 
--> GReg [7] ) 
-> GReg [7] ) 



CtxPtrlnit 
CatchCPtr 
ldMAstGl 
ldMDstG2 
ldMSstG3 
ldDAstG4 
ldDDstGS 
ldDSstG6 
stG7iwShPC 
stG7mvShLoop 
stG7ldCS 
ldMAstGl 
ldMDstG2 
ldMSstG3 
ldDAstG4 
ldDDstG5 
ldDSstG6 , 
ldCAstG7 

stCAirovShReg02Grl 
CtxPtrlnit 
CatchCPtr 

TstPendingAndSwitch// ShRegO saved 

// EM [0x7002] --> GReg[0] 
// Get address for restoring registers 
// Points to CA of channel to restore 



CtxPtrlnit 
CatchCPtr 
addi r0,#17 
ldRJOinLdO 
TWFU02G1 
ldmfub7 
ldmfub6 
ldnafub5 
ldmfub4 
ldmfub3 
ldmfub2 
ldmfubl' 



// GReg[l] = CA 
// CA restored & 
// CS restored & 
// DS restored & 
// DD restored 6c 
II DA restored & 
//MS restored & 
// MD restored & 



fetch CS 
fetch DS 
fetch DD 
fetch DA 
fetch MS 
fetch MD 
fetch MA 



o 



o 



bb 


UUCl 




ldmfubO 


D / 


06e3 


/ / 


IdShLoop 


DO 


07e3 


II 


IdShPC 


D-7 




II 


ldrrGReg7 


70 


06e2 


II 


ldrrGReg6 


71 


05e2 


II 


ldmGRegS 


72 


04e2 


II 


ldrrGReg4 


73 


03e2 


II 


ldrrGReg3 


74 


02e2 


II 


ldnrGReg2 


75 


00e2 


II 


ldmGReglGRegO 


76 


00e4 


II 


cpShReg 


77 


0088 


II 


NOP 


78 


0088 


II 


NOP 


79 


0088 


II 


NOP 



// ma. restored & fetch ShLoop 

// ShLoop restored & fetch ShPC 

// ShPC restored & fetch GReg [7] 

// GReg [7] restored & fetch GReg [6] 

// GReg [6] restored & fetch GReg [5] 

// GReg [5] restored & fetch GReg [4] 

// GReg [4] restored & fetch GReg [3] 

// GReg [3] restored & fetch GReg [2] 

// GReg [2] restored & fetch GReg[l] 

// GReg[l] & GReg[0] restored 

// copy all shadow registers (PC, . . . ) 



9.13.3 Boot Code 



The standard channel 0 boot code. 



80 

81 

82 

83 

84 

85 

86 

87 

88 

89 

90 

91 

92 

93 

94 

95 

96 

97 

98 

99 

100 

101 

102 

103 

104 

105 

106 

107 

108 

109 

110 

111 

112 



80ba 

0870 

0011 

51e0 

0108 

0300 

0a70 

0211 

501a 

5202 

4a00 

7df9 

0017 

0017 

0017 

0017 

0298 

0006 

0700 

0a70 

0211 

501a 

520a 

4a00 

7df9 

0017 

0017 

0017 

0017 

0298 

0006 

0007 

6b00 



// 

// GetChOPC 

// 

// 

// 

// 0: 
// Mccb: 

II 
II 
II 
II 
II 
II 
II 
II 
II 
II 

II 0: 
// 0: 
// Dccb: 

II 
II 
II 
II 
II 
II 
II 
II 
II 
II 

II 0: 

// MDone: 

II 



II jurrp around common subroutines 



jnp Reset 
:ldi rO, REGPAGE 

revblo rO // r0 = 0x7000 

Id rT, ( rO , CHN0ADDR) / / load first pc value of channel 0 
jmpr rT 

(jone 3 //clear HE set HI 

ldi rC, REGPAGE 

revblo rC // pointer to register page 

Id rO, (rC,R_CCR) // load current channel number 
Id rc! (rC,R_MC0PTR)// load channel 0 ptr 
crrpeqi rC, 0 
bt 0b 
lsll rO 
lsll rO 
lsll rO 
lsll rO 
add rC,r0 
ret 

done 7 

ldi rC, REGPAGE 
revblo rC 



// clear DE set DI 



// pointer to register page 
Id rO, (rC,R_CCR) // load current channel number 
Id rC, (rC,RJDC0PTR)// load channel 0 ptr 
crnpeqi rC, 0 
bt 0b 
lsll rO 
lsll rO 
lsll rO 
lsll rO 
add rC,r0 
ret 

clrf 0 
stf rP,ma 



// clear flags 

// address of status word 



o 



o 



113 


3501 


// 


114 


6dl2 


// 


115 


6el6 


/ / 


116 


7f 18 


// 


117 


4508 


// 


118 


7c01 


// 


119 


0201 


// 


120 


lXXJo 


/ / r 


121 


a rno 

450^ 


/ / 


122 


7c06 


// 


123 


000 / 




124 


038a 


// 


125 


lb04 


// 


126 


6b04 


// 


127 


6313 


// 


128 


7e0c 


// 


129 


0006 


// 


130 


0300 


// l 


131 


0007 


// 


132 


/— 1~ r> A 

6D04 


// 


133 


6516 


// 


134 


/euo 


// 


IOC 

135 


/i cm 
45UJL 


II 


136 


7cty 


// 


137 


6616 


// 


138 


6413 


// 


139 


7eoi 


// 


140 


0006 


/ / 
II 


141 


808d 


II 


142 


0300 


II 


143 


oObl 


II 


144 


UUU / 


1 1 


145 


6DU4 


II 


146 




1 1 


147 


/euo 


II 


1 A O 

148 




1 1 


149 


»7-f Q 

/CIo 


1 1 


150 


6616 


II 


151 




II 


152 


/eu± 


II 


153 


UUUb 


1 1 
1 1 


154 


ouya 


1 1 
1 1 


155 


UUU / 


1 1 
1 1 


156 


6D20 


II 


157 


3501 


1 I 
1 1 


158 


6a3<<: 


II 


159 


6e36 


II 


160 


7fl8 


II 


161 


4508 


II 


162 


7c01 


II 


163 


0601 


II 


164 


lb08 


II 


165 


4502 


II 


166 


7c06 


II 





andni rS , BD DONE// indicate cocrplete 

stf rS,md,szl6 // update BD flags (DO IXJT FLUSH! ) 

stf rN,md,szl6,fls// update BD count 

bdf Mcerr 

// should we interrupt? 



// yes, do it 



// 
// 
// 
// 



bump ptr, assume no wrap 
are we really at the end 
if not, skip the following 
clr flags, could enter here 



tsti rS,BD_INTR 
bf Of 
notify 2 
addi rP,BD_SIZE 
tsti rS,ED_WRAP 
bf If 
MFirst: clrf 0 

mov rP,rC 
addi rP,CB_BFTR 
stf rP,ma,pre 
ldf rP,md,sz32 
bsf Mcerr 
1: ret 
Mblock: done 3 

M3etBD: clrf 0 , , - 

stf rP,ma,pre // new DMA address to load frcm 
ldf rS,md,szl6,pre// get status from buf desc 
bsf Mcerr 

tsti rS,BDJXNE // check for done bit 
bf Mblock // if zero, not a valid BD 

ldf rN,rrd,szl6,pre// get byte count frana BD 
ldf rA,md,sz32 
bsf Mcerr 
ret 

Mcerr :9: jnp 9b 
MblockChO -.done 3 

jnp GetChOPC 
M3etBDCh0 :clrf 0 

stf rP,ma,pre 



// offset to ptr to BD array 
// get BD array pointer 

// must wait on MCore clear HE set HI 
// make sure flags are clear 
// 



// get address from BD 



// 
// 
// 
// 



must wait on MCore clear HE set HI 
specific for Channel 0 
make sure flags are clear 

w new DMA address to load from 

ldf rs',nd!szl6 # pre// get status from buf desc 
bsf McerrChO 

tsti rS , BD__DCNE // check for dene bit ^ 
bf MblockChO // if zero, not a valid BD 
ldf rN,md,szl6,pre// get byte count frcm BD 
ldf rA,md,sz32 // get address frcm BD 
bsf McerrChO 



ret 

McerrChO: 9: jnp 9b 
DDone: clrf 0 

stf rP,da 



// clear flags 
// address of status word 
indicate complete 
update BD flags (DO NOT FLUSH 1 ) 



0; 



andni rS , BD_D0NE / / 
stf rS,dd,szl6 // _ 
stf rN,dd,szl6,fls// update count 
bdf Dcerr 
tsti rS , BD_INTR 
bf Of 
notify 6 
addi rP.BDJSIZE 
tsti rS , BD_WRAP 
bf If 



// should we interrupt? 
// yes, do it 

// bump ptr, assume no wrap 
// are we really at the end 
// if not, skip the following 



B-4 



o 



o 



167 


0007 


// 


DFirst : 


168 


038a 


// 




169 


lb04 


// 




170 


6b24 


// 




171 


6333 


// 




172 


7e0c 


// 




173 


0006 


// 


1: 


174 


0700 


// 


Efolock: 


175 


0007 


// 


DGetBD: 


176 


6b24 


// 


0: 


177 


6536 






178 


7e06 


// 




179 


4501 


// 




180 


7cf9 


// 




181 


6636 


// 




182 


6433 


// 




183 


7e01 


// 




184 


0006 


// 




185 


80b9 


// 


Dcerx: 9 


186 


0970 


// 


Reset: 


187 


0111 


// 




188 


5201 


// 




189 


4a00 


// 




190 


7c03 


// 




191 


0100 


// 




192 


8051 


// 




193 


80ba 


// 




194 


c07b 


// 


0: 


195 


OfOO 


// 




196 


80c6 


// 




197 


C06f 


// 


2: 


198 


C090 


// 


3: 


199 


018d 


// 




200 


0112 


// 




201 


3907 


// 




202 


4901 


// 




203 


7c02 


// 




204 


078c 


// 




205 


80c5 


// 




206 


4902 


// 


1: 


207 


7c0c 


// 




208 


6c04 


// 


4: 


209 


008e 


// 




210 


0015 


// 




211 


0015 


// 




212 


7804 


// 




213 


6117 


// 




214 


5907 


// 




215 


lfOl 


// 




216 


0000 


// 




217 


7el7 


// 




218 


7c01 


// 




219 


80c5 


// 




220 


4903 


// 


1: 



clrf 0 // clr flags, could enter here 

mov rP,rC 

addi rP,CB_BFTR // offset to ptr to BD array 
stf rP,da,pre 

ldf rP,dd,sz32 // get BD array pointer 

bsf Dcerr 

ret 

done 7 // must wait on DSP - clear DE set DI 

clrf 0 // make sure flags are clear 

stf rP,da,pre // new DMA address to load from 
ldf rS,dd,szl6,pre// get status from buf desc 
bsf Dcerr 

tsti rS , BD_DO>TE // check for done bit 

bf Dblock // if zero, not a valid BD 

ldf rN,dd, szl6,pre// get byte count from buf desc 

ldf rA,dd,sz32 // get address from buf desc 

bsf Dcerr 

ret 

jmp 9b 

ldi rT, REGPAGE 

revblo rT // pointer to register page 

Id rC, (rT, R MC0PTR)// load channel 0 ptr 



// is channel 0 pointer zero 
// no, continue 

// yes, shut dcwn channel - reschedule 
// Get the first PC value of channel 0 
// then start over 
// get address of first BD 
//in case forget to set addr 



cmpeqi rC, 0 
bf Of 
done 1 
jmp GetChOPC 
jmp Reset 
jsr MFirst 
ldi rL,0 
jmp 3f 
jsr MDone 
jsr MGetBDChO 
mov rT, rS 

rorb rT // get command in low byte 

andi rT,0x07 // look at 3 low bits 
cmpeqi rT # C0_ADDR// command = set address? 
bf If // no, try next command code 

mov rL,rA // save address field 

jmp 2b 

cmpeqi rT, COJjQAD// load command 

bf If // no, try next command code 

stf rA,ma,pre 

mov rO , rN 

lsrl rO // byte count -> word count 

lsrl rO 
loop 4,0 

ldf rT,md,sz32,pre 

st rT, {rL, 0) 

addi rL,l 

yield 

bsf cOberr 

bf If 

jmp 2b 

cmpeqi rT, C0JXMP// dump command 



B-5 



o 



o 



221 


7c0b 


// 




bf If 


// no, try next command code 


222 


6c00 


// 


5 : 


stf rA,ma 




223 


UUoe 


// 




mov r0,rN 




224 


0015 


// 




lsrl rO 


// byte count -> word count 


225 


0015 


// 




lsrl rO 




226 


7804 


/ y 
// 




loop 4,0 




227 


5107 


/ y 
// 




Id rT, (rL,0) 




228 


6917 


y y 
// 




stf rT,md,sz32,fls 


229 


lfOl 


y / 
// 




addi rL, 1 




230 


0000 


/ y 




yield 




231 


7e09 


// 




bsf cOberr 




232 


80c5 


y y 
// 




jrrp 2b 




233 


4904 


y / 


1 : 


cmpeqi rT, CO SETCIT// set context command 


234 


7c02 


y y 
// 




bf If 


// no, try next command code 


235 


cOf 2 


y y 




jsr CmdCtx 




236 


80d0 


y y 
// 




jnp 4b 




237 


4905 


y y 
// 


1: 


cmpeqi rT, C0_GETCTX// get context command 


238 


7cca 


y y 
// 




bf 9b 


// no, ignore 


239 


c0f2 


y y 
// 




jsr CmdCtx 




240 


8 Ode 


y y 
// 




jnp 5b 




241 


80f 1 


y y 
// 


c0berr:9: jrrp 9b 




242 


Of 08 


y y 
// 


CmdCtx: 


ldi rL, CTXPAGE 




243 


0711 


y y 
// 




revblo rL 


// address of contexts 


A A 




// 




mov rT, rS 




245 


0112 


// 




rorb rT 




246 


39f8 


// 




andi rT, 0xF8 


// keep 5 bits (chan * 8) 


247 


0799 


// 




add rL,rT 


// base += (chan * 8) 


248 


0799 


// 




add rL,rT 


// base += (chan * 16) 


249 


0115 


// 




lsrl rT 


// (chan * 4) 


250 


0799 


// 




add rL,rT 


// base += (chan * 20) 


251 


0006 


// 




ret 





9.13.4 MCU to DSP transfer 



252 


C056 


// MDdrra: 


jsr Mccb // 


get MCore CCB address 


253 


5a07 


// 


st rC, (rL,LS_MC) // 


save it 


254 


c07b 


// 


jsr MFirst // 


get MCore first BD address 


255 


5b0f 


// 


st rP, (rL,LS_MP) 




256 


C063 


// 


jsr Dccb // 


get DSP CCB address 


257 


5a27 


// 


st rC, (rL,LS_DC) // 


save it 


'258 


c0a7 


// 


jsr DFirst // 


get DSP first BD address 


259 


5b2f 


// 


st rP, (rL, LS DP) 




260 


OaOO 


// 


ldi rC,0 




261 


530f 


// MDMnxt: 


Id rP, (rL, LS MP) // 


enter with rC = DSP res id 


262 


c083 


// 


jsr M3etBD // 


get next MOore BD 


263 


5b0f 


// 


st rP, (rL, LS MP) 




264 


5dl7 


// 


st rS, (rL, LS MS) 




265 


Self 


// 


st rN, (rL,LS_MN) 




266 


6c04 


// 


stf rA,ma,pre // 


load MOore DMA address 


267 


008e 


// 


mov rO,rN // 


save count 


268 


4a00 


// 


cmpeqi rC, 0 




269 


7c08 


// 


bf 2f 




270 


532f 


// MDDnxt: 


Id rP, (rL,LS_DP) // 


enter with rO = MCore resit 



o 



o 



271 


cOaf 


// 




jsr DGetBD 


II 


get next DSP BD 


272 


5b2f 


// 




st rP, (rL,LS__DP) 






273 


5d37 


// 




st rS, (rL, LS_DS) 






274 


5e3f 


// 




St rN, ( rL , LS_DN) 






275 


6c20 


II 




stf rA, da 


II 


JLoao Lor' lX'TA acoress 


276 


028e 


II 




mov rC, rN 


// 


puc Loir count, in i\- 


271 


0688 


// 




mov rN, rO 


// 


put MOore count in rN 


278 


00d2 


// 


2 : 


cmplt ro,ru 


/ / 


caxcux at e ±ocp counu 


279 


7d01 


// 




bt 3f 






280 


008a 


// 




mov rO , rC 


// 


DSP count < MCore count 


281 


06a0 


// 


3: 


sub rN,r0 


II 


adjust MOore count 


282 


02a0 


// 




sub rC,r0 


II 


adjust DSP count 


283 


4800 


// 




cmpeqi rO , 0 


II 


is trip count 0? 


284 


7d08 


// 




bt 4f 






285 


1803 


// 




addi r0,3 


II 


round up from byte count 


286 


0015 


// 




lsrl rO 


II 




287 


0015 


// 




lsrl rO 


II 


to full word count 


288 


7803 


// 




loop 3,0 


II 


clr flags, loop on next 3 


289 


6117 


// 




ldf rT / ird,sz32,pre// LOOP: get 32 bits from MOore 


290 


6933 


// 




str n , qq, szj^ 


/ / 




291 


0000 


// 




done 0 


// 


jjuuf : yiexa lo > prioncy 


292 


7c2a 


// 




oz MDerr 


// 


jjjrancn i i. riot count rui Kjtit 


293 


4e00 


// 


4 : 


cmpeqi rN, 0 


// 


l^OIc COtult XcaU 1 6CIU r 


294 


7cl6 


II 




JDI luLFanz 


// 


ULdl ICi 1 11 I itil l^cIU 


295 


008a 


// 




mov rO , rC 


/ / 


LAlt LOt X. Cto -Lti v_ftLL it J-L 1 JL VJ 


296 


5207 


// 




ia rv, \ rij , j_o_i v il- ; 


/ / 


LlUbc l v ItA_JXt: 


297 


530f 


// 




1 /-? y-D I >-T T Q M"D ^ 






298 


5517 


II 




Id rS, (rL,LS MS) 






299 


561f 


II 




Id rN, (rL,LS~MN) 






300 


c06f 


// 




jsr MDone 






301 


5b0f 


// 




st rP, (rL, LS MP) 






302 


563f 


// 




Id rN, (rL,LS_DN) 






303 


4800 


// 




cnpeqi rO, 0 


// 


DSP count reach zero? 


304 


7d03 


II 




bt Of 


// 


branch if zero 


305 


5117 


II 




Id rT, (rL,LS_MS) 






306 


4104 


II 




tsti rT,BD CQNT 


// 


is MCore continue bit set? 


307 


7d07 


II 




bt If 


// 


yes, don't close DSP BD 


TOO 


Uoau 


II 


U : 


sub rN, rO 


// 


close DSP BD 


309 


COT"? 

5227 


II 




, Id rC, (rL, LS DC) 






310 


532f 


II 




Id rP, (rL, LS DP) 






311 


5537 


// 




Id rS, (rL,LS_DS) 






'312 


C09b 


// 




jsr DDone 






313 


5b2r 


// 




st rP, (rL, LS DP) 






314 


0800 


II 




ldi r0,0 






315 


0288 


II 


1 : 


mov rC,r0 


// 


put DSP res id back in rC 


316 


8105 


// 




jnp MCMnxt 






jl l 




/ / 


MnMn7 - 


mov rO, rN 


// 


put MODre res id count in rO 


318 


5227 


// 




Id rC, (rL, LS DC) 


// 


close DSP BD 


319 


532f 


// 




Id rP, (rL, LS DP) 






320 


5537 


// 




Id rS, (rL, LS DS) 






321 


563f 


// 




Id rN, (rL,LS_DN) 






322 


c09b 


// 




jsr DDone 






323 


5b2f 


// 




st rP, (rL,LS_DP) 






324 


4504 


// 




tsti rS,BD_OCNT 


// 


is DSP continue bit set? 



o 



o 



325 


7dc8 


// 




bt MDDnxt 






326 


561f 


// 




Id rN, (rL,LS_MN) 


// 


close MCore BD 


327 


06a0 


// 




sub rN, rO 






328 


5207 


// 




Id rC, (rL, LS MC) 






329 


530f 


// 




Id rP, (rL,LS MP) 






330 


5517 


// 




Id rS, (rL,LS_MS) 






331 


C06f 


// 




jsr MDone 






332 


5b0f 


// 




St rP, (rL, LS MP) 






333 


OaOO 


// 




ldi rC,0 






334 


8105 


// 




jirp MDMnxt 






335 


814f 


// MDerr:9: 


jmp 9b 






9.13.5 DSP to MCU transfer 






■3-3/- 


CUD J 


// 


EMcuTia : 


J Sr DCCD 


// 


get DSP OCB address 


-3 J / 


JOZ / 


/ / 




oL X\^ , \LLj f 1_0 LK, j 


// 


save it 


J o o 




/ / 






// 


get DSP first BD address 




^jj^ x 






OL X Jr , y X Xj , 1 O i-Jir i 






740 

-3 ^ W 


v-U JO 


// 




J Si I K~\-AJ 


// 


get MCore CCB address 




JuU f 


/ / 




si x , ixxj, xjo i jl y 


// 


save it 






/ / 




jsi rir not 


// 


get MCore first BD address 




.JX/VJ X 






<=:!- rP f-rT, TJ^ MP} 

X .£, \XXi, J-O i LIT / 






"344 


WWW w 


/ / 




ldi rC 0 ~~ 

X\_ , \J 






345 


532f 

-J -J -L. 


/ / 




Id rP (rL TJ^ DPI 






"}4fi 


v_- Uai 


// 






// 


get next DSP BD 


"}47 




// 




<=:t- -rP (rT. TP np} 






74R 
J ^ o 




/ / 




ct T-c? f-rT. T,. c 5~~ri ( 3) 






_> ^ _7 




/ / 




OL Hi r \ X J_l , 1 X/Li jf 






350 


6c24 


// 






// 


load DSP DMA addr, prefetch 


351 


008e 






mov rO , rN 


// 


save count 


352 


4a00 


// 




onrpeqi rC, 0 






353 


7c08 


// 




bf 2f 






354 


530f 


// 


EMfoxt : 


Id rP, (rL,LS_MP) 






355 


C083 


// 




jsr M3etBD 


// 


get next MCore BD 


356 


5b0f 


// 




st rP, (rL, LS MP) 






357 


5dl7 


// 




st rS, (rL, LS MS) 






358 


Self 


// 




st rN, (rL, LS__MN) 






359 


6c00 


// 




stf rA,nra 


// 


load MCore DMA address 


360 


028e 


// 




mov rC,rN 


// 


put MCore count in rC 


361 


0688 


// 




mov rN, rO 


// 


put DSP count in rN 


362 


00d2 


// 


2: 


crrplt r0,rC 


// 


calculate loop count 


363 


7d01 


// 




bt 3f 






364 


008a 


// 




mov r0,rC 






365 


06a0 


// 


3: 


sub rN, rO 


// 


adjust DSP count 


366 


02a0 


// 




sub rC, rO 


// 


adjust MOore count 


367 


4800 


// 




cmpeqi rO, 0 


// 


is trip count 0? 


368 


7d08 


// 




bt 4f 






369 


1803 


// 




addi r0,3 


// 


round up from byte count 


370 


0015 


// 




lsrl rO 






371 


0015 


// 




lsrl rO 


// 


to full word count 


372 


7803 


// 




loop 3,0 


// 


clr flags, loop on next 3 


373 


6137 


// 




ldf rT,dd,sz32,pre// LOOP: get 32 bits from DSP 


374 


6913 


// 




stf rT,md,sz32 


// LOOP: put 32 bits to MOore 



o 



o 



375 


0000 


/ / 




done o 


// 


LOOP: yield to > priority 


376 


7c2a 






bf DMerr 


// 


branch if not count runout 


377 


4e00 


// 


4 : 


crnpeqi rttf, 0 


// 


DSP count reach zero? 


378 


7cl6 


/ / 




bf EMDnz 


// 


branch if nonzero 


379 


008a 


// 




tnov rO, rC 


// 


put MGore res id count in rO 


380 


5227 


// 




Id rC, (rL,LS DC) 


// 


close DSP BD 


J OJ. 


532f 


// 




Id rP. (rL.LS - DP) 








R^17 






Id rS (rL LS~~ DS) 








— ' VJ J X. 






Id rN (rL,LS~ DN) 










/ / 










-J O -J 








st rP (rL LS DP) 










/ / 




Id rN (rL LS~~MN) 






387 


4800 


// 
/ / 




rrnnpni r0 . 0 


/ / 


MCore count reach zero? 


388 


7d03 


// 




bt Of 


/ / 


branch if zero 


389 


5137 


/ / 




Id rT, (rL, LS DS) 






390 


4104 


// 




tsti rT,BD CCNT 




is DSP continue bit set 


391 


7d07 






bt If ~~ 


// 


yes, don't close MOore BD 


392 


06a0 


// 


0: 


sub rN, rO 


// 


close MOore BD 


393 


5207 


// 
/ / 




Id rC, (rL, LS MC) 






394 


530f 






Id rP, (rL,LS~MP) 






395 


5517 


// 




Id rS, (rL,LS MS) 






396 


c06f 






jsr MDone 






397 


5b0f 


// 




st rP, (rL, LS MP) 






398 


0800 






ldi rO 0 ~~ 






399 


0288 




1; 


rrov rC, rO 


// 


put MOore res id back in rC 


400 


8159 


// 




jrnp EI^IDnxt 






401 

"X \J JL 


008e 


/ / 


EMDnz : 


mnv r~f) rN 


// 


put DSP res id count in rO 


402 


5207 






Id rC, (rL, LS MC) 


//close MCore BD 


403 


530f 


// 




Id rP, (rL, LS MP) 






404 


5517 


// 
/ / 




Id rS, (rL, LS MS) 






405 


561f 


// 




Id rN, (rL, LS_MN) 






406 


c06f 


// 




jsr MDone 






407 


5b0f 


// 




st rP, (rL,LS_MP) 






408 


4504 


// 




tst irS , BD_OQNT 


// 


is MCore continue bit set? 


409 


7dc8 


// 




bt DMtoxt 






410 


563f 


// 




Id rN, (rL,LSJDN) 


//close DSP BD 


411 


06a0 


// 




sub rN, rO 






412 


5227 


// 




Id rC, (rL, LS DC) 






413 


532f 


// 




Id rP, (rL, LS DP) 






414 


5537 


// 




Id rS, (rL,LS JDS) 






415 


c09b 


// 




jsr DDone 






416 


5b2f 


// 




st rP, (rL, LS DP) 






417 


OaOO 


// 




ldi rC, 0 






418 


8159 


// 




jmp CME)nxt 






419 


81a3 


// 


EMerr: 9: 


jrnp 9b 







9.13.6 PPP routine 



420 
421 
422 
423 
424 



0802 
6840 
c056 
c07b 
C083 



// 
// 
// 
// 
// 



ppprinit 



ppprnxt : 



;ldi 
stf 
jsr 
jsr 
jsr 



rO, 0x2 

r0,ca 

Mccb 

MFirst 

NGetBD 



// select CRC-CCI7T16 

// get MCore CCB address 

// get BD array pointer of channel 

// get first Buffer Decriptor 



B-9 



o 



o 



425 


6c00 


// 




stf rA,rra 


426 


008e 


// 




mov r0,rN 


427 


0900 


// 




Idi rT,0 


428 


2101 


// 




subi rT, 1 


429 


6948 


// 




stf rT,cs,0 


430 


81b0 


// 




jmp 2r 


431 


0400 


// 


1: 


done 4 


432 


511f 


// 


2 : 


la rT, (rL,RECv) 


433 


7efd 


// 




bsf Ud 


434 


497e 


// 




cnpeqi rT, 0x7E 


435 


7cfc 


// 




bf 2b 


436 


7807 


// 


ppprlp: 


loop 7,0 


437 


511f 


// 


4: 


Id rT, (rL,RECv) 


438 


497d 


// 




cnpeqi rT, 0x7D 


439 


7d06 


// 




bt 7f 


440 


497e 


// 




cnpeqi rT, 0x7E 


441 


7d0d 


// 




bt 9f 


442 


6949 


// 


5: 


stf rT, cs , run 


443 


6911 


// 




stf rT,md,sz8 


444 


7f04 


// 




bar 8f 


445 


81c3 


// 




jnp HDP 


446 


511f 


// 


7: 


Id rT, (rL,RECv; 


447 


1120 


// 




xori rT, 0x20 


448 


81ba 


// 




jnp 5b 


449 


2dl0 


// 


8: 


ori rS , BD_MERR 


450 


8 Ice 


// 




jap It 


451 


7e01 


// 


HDP: 


u_r T T7\ ryn t»TVv 

DSt UAKT_Wi\r 


452 


81c7 


// 




jnp or 


453 


0400 


// 


UART WKX 


: done 4 


454 


81b4 


// 




jmp ppprlp 


455 


6148 


// 


0:9: 


XCLE JLl t CS 


456 


Oef 0 


// 




lai rrj , uxx u 


457 


0611 


// 




revblo rN 


458 


leb8 


// 




adai rN, 0xB8 


459 


Olce 


// 




cnpeq rT, rN 


460 


7d01 


// 




Dt It 


461 


2d40 


// 




OrX lo , rSD LKLb 


462 


0688 


// 


1: 


rrov rrj , ru 


463 


CObt 


// 




j sr i v ilajiic 


464 


81a8 


// 




jrrp pppxiixu 


465 


0802 


// 


pppxinit 


: lai ru , uxz 


466 


6840 


// 




st r ru , ca 


467 


C056 


// 




jsr Mccb 


468 


c07b 


// 




jsr MFirst 


469 


81d7 


// 




jnp pppxnxt 


470 


— r\ r -C 

C06f 


// pppxdon: 


jsr i v iiJone 


471 


C083 


// 


pppxnxt : 


jsr NGetBD 


472 


6c04 


// 




stf rA,rra,pre 


473 


008e 


// 




mov r0,rN 


474 


0900 


// 




Idi rT,0 


475 


2101 


// 




subi rT, 1 


476 


6948 


// 




stf rT,cs,0 


477 


0c7e 


// 




Idi rA,0x7E 


478 


5c27 


// 




st rA, (rL, XMIT) 



// buffer address 
// buffer size 

// RT= OxFFFFFFFF 

// initialize CRC 

//To avoid the wait instruction 



// no char, or framing error 
// not a flag char 



// check for ESC 

// it is an ESC 

// check for ending flag 

// it is the ending flag 

// run CRC on byte 

// one byte DMA write 

// check for DMA error 

// get the data after the ESC 
// de-escape the byte 
//go store it 



// UART watermark has been reached. 
// Means loop ended with no error 



// desired final crc value 0xf0b8 
// compare for equal 

// size of data transferred 
// finish ED 



// select CRC-CCITT16 
// get MCore CCB address 



// don't touch rN,rS,rL 
// buffer address 
// buffer size 

// RT= OxFFFFFFFF 
// initialize CRC 
// flag 

// opening flag 



B-10 



0 



o 



479 


780a 


// pppxlp: 


480 


6115 


// 


481 


497e 


// 


482 


7d03 


II 


483 


497d 


II 


484 


7d01 


II 


485 


7c03 


II 


486 


1120 


II 1: 


487 


0c7d 


II 


488 


5c27 


II 


489 


5927 


II 3: 


490 


7f01 


II 


491 


8 lee 


II 


492 


0400 


/I UART WKx 


493 


81df 


II 


494 


6148 


II 0: 


495 


0111 


II 


496 


5927 


II 


497 


0111 


II 


498 


5927 


II 


499 


0c7e 


II 


500 


5c27 


II 


501 


81d6 


II 



loop 10,0 

ldf zT,md,sz8,pre// 
cnpeqi rT,0x7E /y 
bt If 

cnpeqi rT,0x7D 
bt If 
bf 3f 

xori rT, 0x20 
ldi rA # 0x7D 
st rA, (rL,XMIT) 
st rT, (rL, XMIT) 
bdf UART_WKx 
jnp Of 
:done 4 
jnp pppxlp 
ldf rT,cs 
revblo rT 
st rT, (rL, XMIT) 
revblo rT 
st rT, (rL,XMIT) 
ldi rA, 0x7E 
st rA, (rL,XMIT) 
jnp pppxdon 



get next data byte 
// need to escape escape? 

// need to escape escape? 



// 
// 
// 
// 
// 
// 
// 
// 
// 



modify escaped data (rT = 5E or 5D) 
escape 

send escape character 
send data 

UART watermark has been reached 
loop ended with no error 
awake an other channel 
lm flag is lost when loop is exited 
get the 1021 data 



// crc hi byte 
// crc lo byte 
// ending flag 



B-ll 



